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MEETING NOTICE 


The monthly meeting of the Wisconsin Commuter Societv will be held this 
coming Saturday, APRIL 1, 1978. It will be held at our usual meeting 
place ~ NAUKESHA TECHMICAL INSTITUTE (Room 202 - Administration Building). 


PROGRAM AGENDA 


Club members should be informed that CP/" is auickly becoming the standard 
for 8080 and Z-80 Disc based systems. The CP/4 users qroun now has a 
library of over 30 flovpy discs of »nublic domain software. DON STEVENS 
will demonstrate his 8080 based svstem runnina under CP/'%. Discussion 

rT club interests will follow. 


NEWSLETTER 


The Newsletter has a new format this month. The Editor is still looking 
for articles of interest to vublish. 
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Fully Static - —_ - 250 nsec. TMS 4044-25. 


16K RAM. 


Available Now! 


ei Assembled, tested unit —*375 


Z-80A “Mhz. Fast: AE 
Our memory board was designed to ‘operate without 
wait states in a 4 Mhz. Z-80A system and allows a 
generous 100 nsec. for the CPU board buffers. Our 
board ‘loafs along” in an 8080 or 8085 system. Even 
if you are using a slower CPU today, don't get caught 
buying a memory board which may become obsolete 
if you decide to switch to a Gen a. more atch eae 
CPU tomorrow. 

Fully Static is Best — Ieee 

Our board uses the eae tha at Texas isi 
ment TMS 4044-25. It needs no clocks and no 
refresh. lt uses a single 8V power supply and won't be 
obsoleted when you buy the next generation system 
using a single power supply. 
Fully S-700 Bus Compatible 

Each 4K addressable to any 4K slot, on-board DIP 
switch memory protect, RAM disable, DMA capability. 
Commercial Quality Components _ 

First quality factory parts, fully socketed, buffered, 
masked both sides, cpeartfonat atl gold contacts, bus 
_bars for lower noise. : ee eo a 
Guaranteed . eRe ES 
- “ASSEMBLED UNITS: if Unsatiefi ed fore any reason 

— return undamaged unit within 10 days for. full” 
refund. Parts and labor guaranteed for one year. ay 
KITS: MOS parts factory tested good — no free _ 
replacements. All eee. pace Sateen one Byte a 
pshipping ss, 

“If we cannot ship within four preeke we wil phone _ 

“for instructions, returning money if you desire. 2 
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This 16K RAM boards is available to 
members at about $325.00 denending 
on size of grouv purchase. Contact 
Don Stevens. 


FOR SALE: 

FLOPPY DISC SYSTEMS with or without 
S-100 Interface Board. Contact 

Don Stevens 

GROUP PURCHASE 

FLOPPY DISCS & Mini-FLOPPY DISCS 
available. Ton Quality product, | 
If interested, contact Don Stevens 


FOR SALE 


Board. 
Contact 


Processor Technology 3P+S 
Still in original carton. 
Don Stevens 


FOR SALE 


ISM 632 Electronic Tvyning Calculator. 
Best offer - Contact Will Piette 
at 246-6634 after 6 o.m. 


WHAT WOULD YOU LIKE TO 


BUY or SELL 


Free listing to club members,etc. 
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article "SOPTWARELAND" is reorizmted courtesv of the 


San Dieao Comnuter Society Januarv 1978 issue of PEPSONAL SYSTEMS 


This is the test program. It shows the 
setting of the registers. The input will be 10 
characters long and displayed on line 5, position 
5, and put into 'MSG'. 


SOFTWARELAND 
by Dick Lindberg 


One of the strengths of a board like the Proces- 
sor Tech VDM-1l is the ability to randomly access 


any spot on the screen. Often, however, it is run BOSC ES AFC: PUSH H 
merely as a terminal substitute, outputting onto BB5D C5 PUSH B 
the bottom line and moving the lines up the screen. BOSE D5 PUSH D 
While it certainly works very well this way, it is BOSEP 3E9p MvI A,B 
a waste of the board's potential. Think how nice 9961 D38C ouT 8CH 
it would be if important messages and data didn't $963 3629 MVI M,29H 
disappear off the top of the screen while the 9965 9B DCX B 
screen filled up with trivia. A very sophisticated B966 ES PUSH H 
looking display can be made qhich simplifies the aes Me tae : 
rati of a i 
Operation the program and the display of the $969 cD9599 oar _ 


results. 


In order to use the VDM-1l in this manner, it is 
necessary to have two functions: 1) display a 
message on the screen and 2) accept a message 
from the keyboard displaying it on the screen. 
This second one is the hardest, so that is the one 
we will do this month. 


The following subroutine has the following 
functions: 


1. It clears the work area in the calling 
program to spaces. 


2. It clears the screen area where the key- 
board message will appear to spaces. 


3. It puts an inverted space as a cursor in 
the first screen position. 


4. It accepts characters from the keyboard 
until a specific number of characters 
have been entered or a carriage return 
entered. 


5. If a "rubout" is entered, the cursor is 
moved back and the last character 
entered is replaced with a space. 


6. When the message is complete, the cursor 
is removed from the screem and the 
contents of the screen transfered to the 
program work area. 


Register settings are: 


H-L = program work area address 

D = screen line number 

E = screen character position 

B-C = maximum characters in the message 


The pseudocoding for the subroutine shows how 
much the subroutine actually does. 


CLEAR MESSAGE AREA 
CALCULATE ACTUAL SCREEN STARTING ADDRESS 
CLEAR SCREEN AREA 
DO GET A CHARACTER 
(UNTIL MAXIMUM CHARACTERS ENTERED 
OR CARRIAGE RETURN ENTERED) 


IF B-C = 0 
SET MAX CHARACTERS INDICATOR 
ELSE 


PUT CURSOR ON SCREEN 
GET A CHARACTER FROM KEYBOARD 
IF CARRIAGE RETURN 
SET MAX CHARACTERS INDICATOR 
ELSE 
IF RUBOUT 
BACKSPACE 
ELSE 
PUT CHARACTER ON SCREEN 
ENDIF 
ENDIF 
CLEAR CURSOR 
MOVE TO NEXT POSITION 
ENDIF 
ENDDO 
MOVE SCREEN AREA TO MESSAGE AREA 


Here is the coding of the subroutine. 


This is the beginning of the subroutine. 
First the register contents are saved for later 
use. Next, the screen is reset. I set up my 
board before the standard output port was changed 


to C8. The last part moves spaces to the message 
area. Note the 'PUSH H, POP D' to move H-L to 
D-E. 

gg6c Dl POP D 

QGED CDA2LPS CALL CLNA 

$876 cl POP B 

$971 CS PUSH B 

9272 ES PUSH H 

$273 OB DCX B 

$974 ES PUSH H 

9975 Dl POP D 

$976 13 INX D 

$G717 3629 MVI M, 29H 

9979 cCD9599 CALL MVC 


This section moves spaces to the screen area 


to be 


used. 


The routine 


"CLNA' 


calculates the 


real memory address from the line number and 
character position in D-E. 


GG7IC EL POP H 
gZ7D Cl POP B 
BZ7TE CS PUSH B 
QZ7IF ES PUSH H 


Register values are reset and saved on the 


stack. 


As written, 
for almost all its work area. 


this routine uses the stack 


$O8P 3AB299 AFCl: LDA EOM 
$983 FEDP CPI g 

$985 CA8E9P JZ AFC2 
$288 CDB3P9g CALL CHAR 
PSZ8B C38999 JMP AFC1 


The subroutine will remain in this loop until 
the flag 'EOM' goes to zero. 


PP8E EL AFC2: POP H 
PP8F Cl POP B 
9998 Dil POP D 
PP91l cD9I5g9 CALL MVC 
$994 c9 RET 


Here the screen is moved to the message area. 
An additional instruction should be added at 
this point to reset 'EOM' so that the subroutine 
will work the second time it is executed. 


$995 78 MVC: MOV A,B 
$996 Bl ORA Cc 
$297 C8 RZ 

$998 $B DCX B 
9999 TE MOV A,M 
GO9A EB XCHG 

999B 77 MOV M,A 
$G9C EB XCHG 

GG9D 23 INX H 
GO9E 13 INX D 
PO9F Cc39599 JMP MVC 


$A48 ORG 49H 
$242 215229 LxI H,MSG 
$943 119595 LXI D,@595H 
$S46 G1GAgs LXI B,19 
$B49 CD5C£9 CALL AFC 
gp4ac C34C89 JHLT: JMP JHLT 
PA4F C3P9B8 JMP SBS8SAH 


$952 


MSG: 


DS 


1g 


This moves a block of memory from one location 
to another. This coding is a little different 
from the way I have done it before, but the 
principle is the same. 


$Ga2 TA CLNA: MOV A,D 


$SA3 QF RRC 

POA4 QF RRC 

PZA5 E6CP ANI gCOH 
QOA7 83 ADD E 
PBA8 6F MOV L,A 
QBA9 7A MOV A,D 
QSAN PF RRC 

$OAB $F RRC 

MAAC E6P3 ANI 93H 
PAAE F688 ORI 88H 
OOBS 67 MOV H,A 
gSBl C9 RET 


This calculates the real address starting from 
a line number in register D and a character posi- 
tion in register E. The 2 low order bits from 
register D are put into the high order bits of 
register L. The value in register E is put in 
the 6 low order bits of register L. The value 
in register D is moved right 2 places and added 
to 88H. If your board's memory is set to CCOOH, 
use CCH. 


gfB2 pi EOM: DB 1 
$2B3 78 CHAR: MOV A,B 
gpp4 Bl ORA c 
POB5 C2BFPS INZ CHRL 
OfB8 97 SUB A 
$fBI 32B299 STA EOM 
PBC C3E2PP IMP CHEX 


If B-C is zero then 'EOM' is set to zero. The 
rest of the routine is bypassed. 


QPBF 36A9 CHRL: MVI M, PASH 
99Cl CDPPBC CALL PBCHSH 


AOH is an inverted space. BCOOH is my keyboard 
input routine. 


ggc4 FESD cPl gDH 
GZC6 C2DhPg JNZ CHR2 
ggco 97 SUR A 

YZCA 32B269 STA EOM 
pZCD c3DCgg oMP CHR4 


If the returned character is a carriage return, 
'EOM' is cleared. 


PP0G FETF CHR2: CPI 7FH 
$GD2 C2DBss INZ CHR3 
$905 CDE3PP CALL BKSP 
PP08 C3DCHF JMP CHR4 


If the returned character is a rubout, back- 
space the screen. 


$Z0B 77 CHR3: MOV M,A 
‘ 

ggoCc TE CHR4: MOV A.M 

$9DD E67F ANI 7FH 

GOOF 77 MOV M,A 

GPrp 23 INX H 

BPEL GB DCX B 


The returned character is put on the screen. 
The inversion bit is removed and the registers 
are updated. 


$PE2 C9 CHEX: - RET 
$2E3 C9 BKSP: RET 
BOND END 


The backspace routine is not included. We 
will go over it in the next column. We will also 
add some refinements to make the display even 
more professional. 


Proposed Input/Output Standard 
by 


* Proposed Input/Output Standard 
by Ray James and Jim Matthews 


A standard in programming input/output is needed. 
This standard should be one that a maximum number of 
micro-computer users can utilize. These users have 
their R.O.M.s at different locations and they are of 
different lengths. A standard that does not dedicate 
a fixed area of R.A.M. is necessary. 


A standard that would probably work for most of 
these users is to have an I/O jump table in their 
program, This jump table would have jumps to the 
addresses of the I/O routines. In a program, you 
would call the jump that goes to the I/O routine 
ys want to use. See figure 1 for an example of 

is. r : 


When a program is received from someone, you go 
into his jump table, which is plainly marked in the 
program listing, and change his jump addresses to the 
addresses of your I/O routines. You can now load his 
program and mn, 


The data, that you want to output, is put in the 
‘A’ register then you call the jump. For an input 
you call the jump and when the program returns the 
data input is in the 'A' register. For X-Y coordi- 
nates you put them in the 'D' & 'E' registers 
(Xiin “D>. “Y Gi "6 ). 


If enough people use this standard, you will be 
able to trade programs with each other. Then you 
will not have to reinvent the wheel each time you 
want a program, 


If you have any suggestions or questions, con- 
tact me at 449-1813 or jim matthews, P.O. Box 699, 
Santee, Ca, 92071. 


0000 [et ye ee raeaay SEES aEaT aol 
Restart Command Locations i 
[= See tal SISTER MORITON Sk. 8 | 
| I/O Routines | 
cslr cert rte ee eee eee Return | 
DS10 | - ot tree eee ee eee Return | 
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